home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Original Shareware 1.1
/
The Original Shareware (WeMake CDs)(Volume 1.1)(CDs, Inc)(1993).iso
/
2
/
qbscreen.zip
/
SHARED.BAS
< prev
next >
Wrap
BASIC Source File
|
1986-12-12
|
1KB
|
25 lines
REM *** SHARED.BAS ***
COMMON SHARED ARG$(),LOCKS$(),DIS$(),INP$(),KEYFLD$()
COMMON SHARED PRT$(),FLD$(),PRM$()
COMMON SHARED ORFLD$(),CRFLD$(),COFLD$(),PRFLD$()
COMMON SHARED WRK1%(),WRK2%(),RECS%(),RECN,SRECN
COMMON SHARED TITLE$,PAGE%,LINES%
COMMON SHARED FG,BG,HL,BL,BLA,RFG,RBG,SFG,SBG,CU1,CU2
COMMON SHARED MEN.C,HLP.C,STA.C,SER.C
COMMON SHARED NTR$,BKSP$,UP$,DN$,RT$,LF$,ESC$,MST$
COMMON SHARED LF.CURSOR,RT.CURSOR,DN.CURSOR,UP.CURSOR
COMMON SHARED CTRL.RT,CTRL.LF,PG.UP,PG.DN,ESC
COMMON SHARED END.KEY,INS.KEY,DEL.KEY,HOME,CTRL.HOME,CTRL.END
COMMON SHARED YES,NO,ES,KY,SELNUM,SELNAM$,HELPFIL$,KEYSW,DATSW
COMMON SHARED BYTS!,KEYNUM,KEYFLD$,KS1,KS2,KS3,KS4,KS5,KS6
COMMON SHARED WBHOR$
COMMON SHARED WSVER$,WBVER$
COMMON SHARED WPHELP$,WSHELP$,WBHELP$
COMMON SHARED WSSTAT$,WBSTAT$
COMMON SHARED WPSEAR$,WSSEAR$,WBSEAR$
COMMON SHARED F1,F2,F3,F4,F5,F6,F7,F8,F9,F10
COMMON SHARED QN%,QS%,QI%,QD%,QR%,QK$,QI$(),QI%(),QK%(),QD$(),QD%(),QR%(),QN$(),QN%()
COMMON SHARED FILERR,FILNUM,FILOPN,FILNAM$
COMMON SHARED EDITMODE,EXITSUB
REM *** END ***